perm filename SP4INS[1,MUS] blob
sn#007318 filedate 1972-07-16 generic text, type T, neo UTF8
00200 < ***** NOTES *****
00400
00600 <READ THIS INTO SOUND GENERATING PROGRAM WHEN USING
00800 <NOTE LISTS PREPARED BY 'SCORE' PROGRAMS.
00900 EXTERNAL FUNCTION SPACE4(ARRAY A,ARRAY B,ARRAY C,ARRAY D,
00950 ARRAY E,ARRAY F,ARRAY G,ARRAY H),
01200 SYNTH(ARRAY A),SEE(ARRAY Z),
01400 SEG(ARRAY D), DUR(X,Y,Z); ARRAY F1,F2,F3,F4,F5,F6,F7(512),S1(1200);
01600 VARIABLE MAG, C,CS,D,DS,E,F,FS,G,GS,A,AS,B,
01800 PPPP,PPP,PP,P,MP,MF,FO,FF,FFF,FFFF;
02000 C←261.62; CS←277.18; D←293.66; DS←311.13; E←329.63;
02200 F←349.23; FS←369.99; G←391.99; GS←415.31;
02400 A←440; AS←466.16; B←493.89;
02600
02800 PPPP←70; PPP←100; PP←165; P←235; MP←330;
03000 MF←480; FO←670; FF←950; FFF←1300; FFFF←1900;
03200
03400 <-- F1 ARRAY MUST BE FILLED FOR INST SIMP TO PLAY;
03800 SRATE←25000;MAG←512/SRATE;SPEED←5;NCHNS←4;
04000